Fluke MET/CAL Procedure ============================================================================= INSTRUMENT: Fluke 5700A: (90 day) CAL VER ACV IEEE /792A,8506 DATE: 02-Oct-98 AUTHOR: Fluke REVISION: $Revision: 2.1 $ ADJUSTMENT THRESHOLD: 70% NUMBER OF TESTS: 40 NUMBER OF LINES: 495 CONFIGURATION: Fluke 8506A STANDARD: Fluke 792A ============================================================================= # # Source: # Fluke 5700A Service Manual, Section 3, Rev 2, May 1991 # # Compatibility: # MET/CAL 5.0 or later # # Subprocedures: # Sub Wait for 792A to Settle /8506 # # Required Files: # 792CON2.bmp # 792MV220.bmp # 792V22.bmp # 792V220.bmp # 792V2_2.bmp # 792V2_2.bmp # # System Specifications: # TUR calculation is based on specification interval of the accuracy file. # # Fluke makes no warranty, expressed or implied, as to the fitness # or suitability of this procedure in the customer's application. # STEP FSC RANGE NOMINAL TOLERANCE MOD1 MOD2 3 4 CON 1.001 STD Fluke 792A 1.002 ASK- R Q N P F W 1.003 IEEE *CLS;*RST 1.004 PIC 792MV220 1.005 HEAD ACV CALIBRATION {220mV RANGE}: 200mVDC 1.006 MATH M[2] = 0 1.007 IEEE [T30000] OUT 200mV; OPER; *OPC?[I] 1.008 CALL Sub Wait for 792A to Settle /8506 1.009 8506 0.2V E N 2W 1.010 MATH M[10] = MEM 1.011 IEEE [T30000] OUT -200mV; *OPC?[I] 1.012 CALL Sub Wait for 792A to Settle /8506 1.013 8506 0.2V E N 2W 1.014 MATH M[10] = (MEM + M[10]) / 2 1.015 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 10Hz} 1.016 MATH M[2] = 10 1.017 IEEE [T30000] OUT 200mV,10Hz; OPER; *OPC?[I] 1.018 CALL Sub Wait for 792A to Settle /8506 1.019 8506 0.2V E N 2W 1.020 MATH MEM1 = (MEM - M[10]) / M[10] 1.021 DOS 792_ACDC 792A 200E-3 10 220E-3 1.022 MATH MEM1 = MEM1 * 1E6 + MEM 1.023 MATH MEM = 0 1.024 MEMC ppm 630U 2.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 20Hz} 2.002 MATH M[2] = 20 2.003 IEEE [T30000] OUT 200mV,20Hz; OPER; *OPC?[I] 2.004 CALL Sub Wait for 792A to Settle /8506 2.005 8506 0.2V E N 2W 2.006 MATH MEM1 = (MEM - M[10]) / M[10] 2.007 DOS 792_ACDC 792A 200E-3 20 220E-3 2.008 MATH MEM1 = MEM1 * 1E6 + MEM 2.009 MATH MEM = 0 2.010 MEMC ppm 270U 3.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 40Hz} 3.002 MATH M[2] = 40 3.003 IEEE [T30000] OUT 200mV,40Hz; OPER; *OPC?[I] 3.004 CALL Sub Wait for 792A to Settle /8506 3.005 8506 0.2V E N 2W 3.006 MATH MEM1 = (MEM - M[10]) / M[10] 3.007 DOS 792_ACDC 792A 200E-3 40 220E-3 3.008 MATH MEM1 = MEM1 * 1E6 + MEM 3.009 MATH MEM = 0 3.010 MEMC ppm 150U 4.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 1kHz} 4.002 MATH M[2] = 1E+3 4.003 IEEE [T30000] OUT 200mV,1kHz; OPER; *OPC?[I] 4.004 CALL Sub Wait for 792A to Settle /8506 4.005 8506 0.2V E N 2W 4.006 MATH MEM1 = (MEM - M[10]) / M[10] 4.007 DOS 792_ACDC 792A 200E-3 1E+3 220E-3 4.008 MATH MEM1 = MEM1 * 1E6 + MEM 4.009 MATH MEM = 0 4.010 MEMC ppm 150U 5.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 20kHz} 5.002 MATH M[2] = 20E+3 5.003 IEEE [T30000] OUT 200mV,20kHz; OPER; *OPC?[I] 5.004 CALL Sub Wait for 792A to Settle /8506 5.005 8506 0.2V E N 2W 5.006 MATH MEM1 = (MEM - M[10]) / M[10] 5.007 DOS 792_ACDC 792A 200E-3 20E+3 220E-3 5.008 MATH MEM1 = MEM1 * 1E6 + MEM 5.009 MATH MEM = 0 5.010 MEMC ppm 150U 6.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 50kHz} 6.002 MATH M[2] = 50E+3 6.003 IEEE [T30000] OUT 200mV,50kHz; OPER; *OPC?[I] 6.004 CALL Sub Wait for 792A to Settle /8506 6.005 8506 0.2V E N 2W 6.006 MATH MEM1 = (MEM - M[10]) / M[10] 6.007 DOS 792_ACDC 792A 200E-3 50E+3 220E-3 6.008 MATH MEM1 = MEM1 * 1E6 + MEM 6.009 MATH MEM = 0 6.010 MEMC ppm 380U 7.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 100kHz} 7.002 MATH M[2] = 100E+3 7.003 IEEE [T30000] OUT 200mV,100kHz; OPER; *OPC?[I] 7.004 CALL Sub Wait for 792A to Settle /8506 7.005 8506 0.2V E N 2W 7.006 MATH MEM1 = (MEM - M[10]) / M[10] 7.007 DOS 792_ACDC 792A 200E-3 100E+3 220E-3 7.008 MATH MEM1 = MEM1 * 1E6 + MEM 7.009 MATH MEM = 0 7.010 MEMC ppm 950U 8.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 300kHz} 8.002 MATH M[2] = 300E+3 8.003 IEEE [T30000] OUT 200mV,300kHz; OPER; *OPC?[I] 8.004 CALL Sub Wait for 792A to Settle /8506 8.005 8506 0.2V E N 2W 8.006 MATH MEM1 = (MEM - M[10]) / M[10] 8.007 DOS 792_ACDC 792A 200E-3 300E+3 220E-3 8.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 8.009 MATH MEM = 0 8.010 MEMC pct 0.12U 9.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 500kHz} 9.002 MATH M[2] = 500E+3 9.003 IEEE [T30000] OUT 200mV,500kHz; OPER; *OPC?[I] 9.004 CALL Sub Wait for 792A to Settle /8506 9.005 8506 0.2V E N 2W 9.006 MATH MEM1 = (MEM - M[10]) / M[10] 9.007 DOS 792_ACDC 792A 200E-3 500E+3 220E-3 9.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 9.009 MATH MEM = 0 9.010 MEMC pct 0.19U 10.001 HEAD ACV CALIBRATION 220mV RANGE:{ 200mV @ 1MHz} 10.002 MATH M[2] = 1E+6 10.003 IEEE [T30000] OUT 200mV,1MHz; OPER; *OPC?[I] 10.004 CALL Sub Wait for 792A to Settle /8506 10.005 8506 0.2V E N 2W 10.006 MATH MEM1 = (MEM - M[10]) / M[10] 10.007 DOS 792_ACDC 792A 200E-3 1E+6 220E-3 10.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 10.009 MATH MEM = 0 10.010 MEMC pct 0.38U 11.001 IEEE STBY; OUT 0V,0Hz 11.002 RSLT = 11.003 HEAD ACV CALIBRATION {2.2V RANGE}: 2VDC 11.004 MATH M[2] = 0 11.005 PIC 792V2_2 11.006 IEEE [T30000] OUT 2V; OPER; *OPC?[I] 11.007 CALL Sub Wait for 792A to Settle /8506 11.008 8506 0.2V E N 2W 11.009 MATH M[10] = MEM 11.010 IEEE [T30000] OUT -2V; *OPC?[I] 11.011 CALL Sub Wait for 792A to Settle /8506 11.012 8506 0.2V E N 2W 11.013 MATH M[10] = (MEM + M[10]) / 2 11.014 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 10Hz} 11.015 MATH M[2] = 10 11.016 IEEE [T30000] OUT 2V,10Hz; OPER; *OPC?[I] 11.017 CALL Sub Wait for 792A to Settle /8506 11.018 8506 0.2V E N 2W 11.019 MATH MEM1 = (MEM - M[10]) / M[10] 11.020 DOS 792_ACDC 792A 2 10 2.2 11.021 MATH MEM1 = MEM1 * 1E6 + MEM 11.022 MATH MEM = 0 11.023 MEMC ppm 600U 12.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 20Hz} 12.002 MATH M[2] = 20 12.003 IEEE [T30000] OUT 2V,20Hz; OPER; *OPC?[I] 12.004 CALL Sub Wait for 792A to Settle /8506 12.005 8506 0.2V E N 2W 12.006 MATH MEM1 = (MEM - M[10]) / M[10] 12.007 DOS 792_ACDC 792A 2 20 2.2 12.008 MATH MEM1 = MEM1 * 1E6 + MEM 12.009 MATH MEM = 0 12.010 MEMC ppm 185U 13.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 40Hz} 13.002 MATH M[2] = 40 13.003 IEEE [T30000] OUT 2V,40Hz; OPER; *OPC?[I] 13.004 CALL Sub Wait for 792A to Settle /8506 13.005 8506 0.2V E N 2W 13.006 MATH MEM1 = (MEM - M[10]) / M[10] 13.007 DOS 792_ACDC 792A 2 40 2.2 13.008 MATH MEM1 = MEM1 * 1E6 + MEM 13.009 MATH MEM = 0 13.010 MEMC ppm 78.5U 14.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 1kHz} 14.002 MATH M[2] = 1E+3 14.003 IEEE [T30000] OUT 2V,1kHz; OPER; *OPC?[I] 14.004 CALL Sub Wait for 792A to Settle /8506 14.005 8506 0.2V E N 2W 14.006 MATH MEM1 = (MEM - M[10]) / M[10] 14.007 DOS 792_ACDC 792A 2 1E+3 2.2 14.008 MATH MEM1 = MEM1 * 1E6 + MEM 14.009 MATH MEM = 0 14.010 MEMC ppm 78.5U 15.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 20kHz} 15.002 MATH M[2] = 20E+3 15.003 IEEE [T30000] OUT 2V,20kHz; OPER; *OPC?[I] 15.004 CALL Sub Wait for 792A to Settle /8506 15.005 8506 0.2V E N 2W 15.006 MATH MEM1 = (MEM - M[10]) / M[10] 15.007 DOS 792_ACDC 792A 2 20E+3 2.2 15.008 MATH MEM1 = MEM1 * 1E6 + MEM 15.009 MATH MEM = 0 15.010 MEMC ppm 78.5U 16.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 50kHz} 16.002 MATH M[2] = 50E+3 16.003 IEEE [T30000] OUT 2V,50kHz; OPER; *OPC?[I] 16.004 CALL Sub Wait for 792A to Settle /8506 16.005 8506 0.2V E N 2W 16.006 MATH MEM1 = (MEM - M[10]) / M[10] 16.007 DOS 792_ACDC 792A 2 50E+3 2.2 16.008 MATH MEM1 = MEM1 * 1E6 + MEM 16.009 MATH MEM = 0 16.010 MEMC ppm 140U 17.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 100kHz} 17.002 MATH M[2] = 100E+3 17.003 IEEE [T30000] OUT 2V,100kHz; OPER; *OPC?[I] 17.004 CALL Sub Wait for 792A to Settle /8506 17.005 8506 0.2V E N 2W 17.006 MATH MEM1 = (MEM - M[10]) / M[10] 17.007 DOS 792_ACDC 792A 2 100E+3 2.2 17.008 MATH MEM1 = MEM1 * 1E6 + MEM 17.009 MATH MEM = 0 17.010 MEMC ppm 290U 18.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 300kHz} 18.002 MATH M[2] = 300E+3 18.003 IEEE [T30000] OUT 2V,300kHz; OPER; *OPC?[I] 18.004 CALL Sub Wait for 792A to Settle /8506 18.005 8506 0.2V E N 2W 18.006 MATH MEM1 = (MEM - M[10]) / M[10] 18.007 DOS 792_ACDC 792A 2 300E+3 2.2 18.008 MATH MEM1 = MEM1 * 1E6 + MEM 18.009 MATH MEM = 0 18.010 MEMC ppm 515U 19.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 500kHz} 19.002 MATH M[2] = 500E+3 19.003 IEEE [T30000] OUT 2V,500kHz; OPER; *OPC?[I] 19.004 CALL Sub Wait for 792A to Settle /8506 19.005 8506 0.2V E N 2W 19.006 MATH MEM1 = (MEM - M[10]) / M[10] 19.007 DOS 792_ACDC 792A 2 500E+3 2.2 19.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 19.009 MATH MEM = 0 19.010 MEMC pct 0.13U 20.001 HEAD ACV CALIBRATION 2.2V RANGE:{ 2V @ 1MHz} 20.002 MATH M[2] = 1E+6 20.003 IEEE [T30000] OUT 2V,1MHz; OPER; *OPC?[I] 20.004 CALL Sub Wait for 792A to Settle /8506 20.005 8506 0.2V E N 2W 20.006 MATH MEM1 = (MEM - M[10]) / M[10] 20.007 DOS 792_ACDC 792A 2 1E+6 2.2 20.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 20.009 MATH MEM = 0 20.010 MEMC pct 0.27U 21.001 HEAD ACV CALIBRATION {22V RANGE}: 20VDC 21.002 MATH M[2] = 0 21.003 PIC 792V22 21.004 IEEE [T30000] OUT 20V; OPER; *OPC?[I] 21.005 CALL Sub Wait for 792A to Settle /8506 21.006 8506 0.2V E N 2W 21.007 MATH M[10] = MEM 21.008 IEEE [T30000] OUT -20V; *OPC?[I] 21.009 CALL Sub Wait for 792A to Settle /8506 21.010 8506 0.2V E N 2W 21.011 MATH M[10] = (MEM + M[10]) / 2 21.012 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 10Hz} 21.013 MATH M[2] = 10 21.014 IEEE [T30000] OUT 20V,10Hz; *OPC?[I] 21.015 CALL Sub Wait for 792A to Settle /8506 21.016 8506 0.2V E N 2W 21.017 MATH MEM1 = (MEM - M[10]) / M[10] 21.018 DOS 792_ACDC 792A 20 10 22 21.019 MATH MEM1 = MEM1 * 1E6 + MEM 21.020 MATH MEM = 0 21.021 MEMC ppm 600U 22.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 20Hz} 22.002 MATH M[2] = 20 22.003 IEEE [T30000] OUT 20V,20Hz; *OPC?[I] 22.004 CALL Sub Wait for 792A to Settle /8506 22.005 8506 0.2V E N 2W 22.006 MATH MEM1 = (MEM - M[10]) / M[10] 22.007 DOS 792_ACDC 792A 20 20 22 22.008 MATH MEM1 = MEM1 * 1E6 + MEM 22.009 MATH MEM = 0 22.010 MEMC ppm 185U 23.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 40Hz} 23.002 MATH M[2] = 40 23.003 IEEE [T30000] OUT 20V,40Hz; *OPC?[I] 23.004 CALL Sub Wait for 792A to Settle /8506 23.005 8506 0.2V E N 2W 23.006 MATH MEM1 = (MEM - M[10]) / M[10] 23.007 DOS 792_ACDC 792A 20 40 22 23.008 MATH MEM1 = MEM1 * 1E6 + MEM 23.009 MATH MEM = 0 23.010 MEMC ppm 78.5U 24.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 1kHz} 24.002 MATH M[2] = 1E+3 24.003 IEEE [T30000] OUT 20V,1kHz; *OPC?[I] 24.004 CALL Sub Wait for 792A to Settle /8506 24.005 8506 0.2V E N 2W 24.006 MATH MEM1 = (MEM - M[10]) / M[10] 24.007 DOS 792_ACDC 792A 20 1E+3 22 24.008 MATH MEM1 = MEM1 * 1E6 + MEM 24.009 MATH MEM = 0 24.010 MEMC ppm 78.5U 25.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 20kHz} 25.002 MATH M[2] = 20E+3 25.003 IEEE [T30000] OUT 20V,20kHz; *OPC?[I] 25.004 CALL Sub Wait for 792A to Settle /8506 25.005 8506 0.2V E N 2W 25.006 MATH MEM1 = (MEM - M[10]) / M[10] 25.007 DOS 792_ACDC 792A 20 20E+3 22 25.008 MATH MEM1 = MEM1 * 1E6 + MEM 25.009 MATH MEM = 0 25.010 MEMC ppm 78.5U 26.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 50kHz} 26.002 MATH M[2] = 50E+3 26.003 IEEE [T30000] OUT 20V,50kHz; *OPC?[I] 26.004 CALL Sub Wait for 792A to Settle /8506 26.005 8506 0.2V E N 2W 26.006 MATH MEM1 = (MEM - M[10]) / M[10] 26.007 DOS 792_ACDC 792A 20 50E+3 22 26.008 MATH MEM1 = MEM1 * 1E6 + MEM 26.009 MATH MEM = 0 26.010 MEMC ppm 140U 27.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 100kHz} 27.002 MATH M[2] = 100E+3 27.003 IEEE [T30000] OUT 20V,100kHz; *OPC?[I] 27.004 CALL Sub Wait for 792A to Settle /8506 27.005 8506 0.2V E N 2W 27.006 MATH MEM1 = (MEM - M[10]) / M[10] 27.007 DOS 792_ACDC 792A 20 100E+3 22 27.008 MATH MEM1 = MEM1 * 1E6 + MEM 27.009 MATH MEM = 0 27.010 MEMC ppm 270U 28.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 300kHz} 28.002 MATH M[2] = 300E+3 28.003 IEEE [T30000] OUT 20V,300kHz; *OPC?[I] 28.004 CALL Sub Wait for 792A to Settle /8506 28.005 8506 0.2V E N 2W 28.006 MATH MEM1 = (MEM - M[10]) / M[10] 28.007 DOS 792_ACDC 792A 20 300E+3 22 28.008 MATH MEM1 = MEM1 * 1E6 + MEM 28.009 MATH MEM = 0 28.010 MEMC ppm 635U 29.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 500kHz} 29.002 MATH M[2] = 500E+3 29.003 IEEE [T30000] OUT 20V,500kHz; *OPC?[I] 29.004 CALL Sub Wait for 792A to Settle /8506 29.005 8506 0.2V E N 2W 29.006 MATH MEM1 = (MEM - M[10]) / M[10] 29.007 DOS 792_ACDC 792A 20 500E+3 22 29.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 29.009 MATH MEM = 0 29.010 MEMC pct 0.16U 30.001 HEAD ACV CALIBRATION 22V RANGE:{ 20V @ 1MHz} 30.002 MATH M[2] = 1E+6 30.003 IEEE [T30000] OUT 20V,1MHz; *OPC?[I] 30.004 CALL Sub Wait for 792A to Settle /8506 30.005 8506 0.2V E N 2W 30.006 MATH MEM1 = (MEM - M[10]) / M[10] 30.007 DOS 792_ACDC 792A 20 1E+6 22 30.008 MATH MEM1 = (MEM1 + (MEM / 1E6)) * 100 30.009 MATH MEM = 0 30.010 MEMC pct 0.33U 31.001 IEEE STBY; OUT 0V,0Hz 31.002 RSLT = 31.003 HEAD ACV CALIBRATION {220V RANGE}: 200VDC 31.004 MATH M[2] = 0 31.005 PIC 792V220 31.006 IEEE [T30000] OUT 200V; OPER; *OPC?[I] 31.007 CALL Sub Wait for 792A to Settle /8506 31.008 8506 0.2V E N 2W 31.009 MATH M[10] = MEM 31.010 IEEE [T30000] OUT -200V; *OPC?[I] 31.011 CALL Sub Wait for 792A to Settle /8506 31.012 8506 0.2V E N 2W 31.013 MATH M[10] = (MEM + M[10]) / 2 31.014 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 10Hz} 31.015 MATH M[2] = 10 31.016 IEEE [T30000] OUT 200V,10Hz; OPER; *OPC?[I] 31.017 CALL Sub Wait for 792A to Settle /8506 31.018 8506 0.2V E N 2W 31.019 MATH MEM1 = (MEM - M[10]) / M[10] 31.020 DOS 792_ACDC 792A 200 10 220 31.021 MATH MEM1 = MEM1 * 1E6 + MEM 31.022 MATH MEM = 0 31.023 MEMC ppm 600U 32.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 20Hz} 32.002 MATH M[2] = 20 32.003 IEEE [T30000] OUT 200V,20Hz; *OPC?[I] 32.004 CALL Sub Wait for 792A to Settle /8506 32.005 8506 0.2V E N 2W 32.006 MATH MEM1 = (MEM - M[10]) / M[10] 32.007 DOS 792_ACDC 792A 200 20 220 32.008 MATH MEM1 = MEM1 * 1E6 + MEM 32.009 MATH MEM = 0 32.010 MEMC ppm 185U 33.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 40Hz} 33.002 MATH M[2] = 40 33.003 IEEE [T30000] OUT 200V,40Hz; *OPC?[I] 33.004 CALL Sub Wait for 792A to Settle /8506 33.005 8506 0.2V E N 2W 33.006 MATH MEM1 = (MEM - M[10]) / M[10] 33.007 DOS 792_ACDC 792A 200 40 220 33.008 MATH MEM1 = MEM1 * 1E6 + MEM 33.009 MATH MEM = 0 33.010 MEMC ppm 85U 34.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 1kHz} 34.002 MATH M[2] = 1E+3 34.003 IEEE [T30000] OUT 200V,1kHz; OPER; *OPC?[I] 34.004 CALL Sub Wait for 792A to Settle /8506 34.005 8506 0.2V E N 2W 34.006 MATH MEM1 = (MEM - M[10]) / M[10] 34.007 DOS 792_ACDC 792A 200 1E+3 220 34.008 MATH MEM1 = MEM1 * 1E6 + MEM 34.009 MATH MEM = 0 34.010 MEMC ppm 85U 35.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 20kHz} 35.002 MATH M[2] = 20E+3 35.003 IEEE [T30000] OUT 200V,20kHz; *OPC?[I] 35.004 CALL Sub Wait for 792A to Settle /8506 35.005 8506 0.2V E N 2W 35.006 MATH MEM1 = (MEM - M[10]) / M[10] 35.007 DOS 792_ACDC 792A 200 20E+3 220 35.008 MATH MEM1 = MEM1 * 1E6 + MEM 35.009 MATH MEM = 0 35.010 MEMC ppm 85U 36.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 50kHz} 36.002 MATH M[2] = 50E+3 36.003 IEEE [T30000] OUT 200V,50kHz; *OPC?[I] 36.004 CALL Sub Wait for 792A to Settle /8506 36.005 8506 0.2V E N 2W 36.006 MATH MEM1 = (MEM - M[10]) / M[10] 36.007 DOS 792_ACDC 792A 200 50E+3 220 36.008 MATH MEM1 = MEM1 * 1E6 + MEM 36.009 MATH MEM = 0 36.010 MEMC ppm 240U 37.001 HEAD ACV CALIBRATION 220V RANGE:{ 200V @ 100kHz} 37.002 MATH M[2] = 100E+3 37.003 IEEE [T30000] OUT 200V,100kHz; *OPC?[I] 37.004 CALL Sub Wait for 792A to Settle /8506 37.005 8506 0.2V E N 2W 37.006 MATH MEM1 = (MEM - M[10]) / M[10] 37.007 DOS 792_ACDC 792A 200 100E+3 220 37.008 MATH MEM1 = MEM1 * 1E6 + MEM 37.009 MATH MEM = 0 37.010 MEMC ppm 600U 38.001 IEEE STBY; OUT 0V,0Hz 38.002 RSLT = 38.003 HEAD ACV CALIBRATION {1100V RANGE}: 1000VDC 38.004 MATH M[2] = 0 38.005 PIC 792CON2 38.006 PIC 792V2_2 38.007 IEEE [T30000] OUT 1000V; OPER; *OPC?[I] 38.008 CALL Sub Wait for 792A to Settle /8506 38.009 8506 0.2V E N 2W 38.010 MATH M[10] = MEM 38.011 IEEE [T30000] OUT -1000V; *OPC?[I] 38.012 CALL Sub Wait for 792A to Settle /8506 38.013 8506 0.2V E N 2W 38.014 MATH M[10] = (MEM + M[10]) / 2 38.015 HEAD ACV CALIBRATION 1100V RANGE:{ 1000V @ 100Hz} 38.016 MATH M[2] = 100 38.017 IEEE [T30000] OUT 1000V,100Hz; BOOST OFF; OPER; *OPC?[I] 38.018 CALL Sub Wait for 792A to Settle /8506 38.019 8506 0.2V E N 2W 38.020 MATH MEM1 = (MEM - M[10]) / M[10] 38.021 DOS 792_ACDC 792A 1000 100 1000 38.022 MATH MEM1 = MEM1 * 1E6 + MEM 38.023 MATH MEM = 0 38.024 MEMC ppm 84U 39.001 HEAD ACV CALIBRATION 1100V RANGE:{ 1000V @ 1kHz} 39.002 MATH M[2] = 1E+3 39.003 IEEE [T30000] OUT 1000V,1kHz; BOOST OFF; OPER; *OPC?[I] 39.004 CALL Sub Wait for 792A to Settle /8506 39.005 8506 0.2V E N 2W 39.006 MATH MEM1 = (MEM - M[10]) / M[10] 39.007 DOS 792_ACDC 792A 1000 1E+3 1000 39.008 MATH MEM1 = MEM1 * 1E6 + MEM 39.009 MATH MEM = 0 39.010 MEMC ppm 84U 40.001 IEEE STBY; OUT 0V,0Hz 40.002 HEAD 40.003 END